home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh7x / sh72a.d64 / text_graf. fx-80 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  237b  |  11 lines
  1. 10 REM --- DRUCK EINER SINUSKURVE ---
  2. 20 REM ---       UND TEXT         ---
  3. 30 OPEN1,4
  4. 40 PRINT#1,"DAS IST ";
  5. 50 PRINT#1,CHR$(27);"*";CHR$(0);CHR$(8);CHR$(0);
  6. 60 A$=CHR$(255):FORI=1TO6:A$=A$+CHR$(129):NEXTI:A$=A$+CHR$(255)
  7. 70 PRINT#1,A$;
  8. 80 PRINT#1," EIN BEISPIEL"
  9. 90 PRINT#1
  10. 100 CLOSE1
  11.